home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Graphics Programming (2nd Edition) / Visual Basic Graphics Programming 2nd Edition.iso / Src / Ch17 / 15Pgn1Sp.ray < prev    next >
Text File  |  1999-07-06  |  6KB  |  194 lines
  1. Viewpoint(1000, 1.2, -0.3)
  2. AmbientLight(128, 128, 128)
  3. LightSource(-1000, -500, 1000, 255, 255, 255)
  4. Sphere( 75, 0,0,0,
  5.   0.1, 0.6, 0.1,    ' Ambient
  6.   0.1, 0.6, 0.1,    ' Diffuse
  7.   10, 0.3,          ' Specular
  8.   0, 0, 0,          ' Reflected
  9.   1, 1, 1,          ' TransN, n1, n2
  10.   0, 0, 0           ' Transmitted
  11. )
  12. Polygon(4, ' Number of points
  13.   55.55703, -83.14696, 0, 
  14.   92.38795, -38.26834, 0, 
  15.   54.30428, -38.26834, 74.74342, 
  16.   32.6556, -83.14696, 44.94658, 
  17.   0.6, 0.1, 0.1,    ' Ambient
  18.   0.6, 0.1, 0.1,    ' Diffuse
  19.   10, 0.3,          ' Specular
  20.   0, 0, 0,          ' Reflected
  21.   1, 1, 1,          ' TransN, n1, n2
  22.   0, 0, 0           ' Transmitted
  23. )
  24. Polygon(4, ' Number of points
  25.   98.07853, -19.50903, 0, 
  26.   92.38795, 38.26835, 0, 
  27.   54.30428, 38.26835, 74.74342, 
  28.   57.64911, -19.50903, 79.3472, 
  29.   0.6, 0.1, 0.1,    ' Ambient
  30.   0.6, 0.1, 0.1,    ' Diffuse
  31.   10, 0.3,          ' Specular
  32.   0, 0, 0,          ' Reflected
  33.   1, 1, 1,          ' TransN, n1, n2
  34.   0, 0, 0           ' Transmitted
  35. )
  36. Polygon(4, ' Number of points
  37.   83.14696, 55.55703, 0, 
  38.   38.26834, 92.38795, 0, 
  39.   22.49356, 92.38795, 30.95974, 
  40.   48.87255, 55.55703, 67.2673, 
  41.   0.6, 0.1, 0.1,    ' Ambient
  42.   0.6, 0.1, 0.1,    ' Diffuse
  43.   10, 0.3,          ' Specular
  44.   0, 0, 0,          ' Reflected
  45.   1, 1, 1,          ' TransN, n1, n2
  46.   0, 0, 0           ' Transmitted
  47. )
  48. Polygon(4, ' Number of points
  49.   17.16806, -83.14696, 52.83787, 
  50.   28.54944, -38.26834, 87.86617, 
  51.   -54.30428, -38.26834, 74.74342, 
  52.   -32.6556, -83.14696, 44.94658, 
  53.   0.6, 0.1, 0.1,    ' Ambient
  54.   0.6, 0.1, 0.1,    ' Diffuse
  55.   10, 0.3,          ' Specular
  56.   0, 0, 0,          ' Reflected
  57.   1, 1, 1,          ' TransN, n1, n2
  58.   0, 0, 0           ' Transmitted
  59. )
  60. Polygon(4, ' Number of points
  61.   30.30793, -19.50903, 93.27823, 
  62.   28.54944, 38.26835, 87.86617, 
  63.   -54.30428, 38.26835, 74.74342, 
  64.   -57.64912, -19.50903, 79.34719, 
  65.   0.6, 0.1, 0.1,    ' Ambient
  66.   0.6, 0.1, 0.1,    ' Diffuse
  67.   10, 0.3,          ' Specular
  68.   0, 0, 0,          ' Reflected
  69.   1, 1, 1,          ' TransN, n1, n2
  70.   0, 0, 0           ' Transmitted
  71. )
  72. Polygon(4, ' Number of points
  73.   25.69382, 55.55703, 79.07745, 
  74.   11.82557, 92.38795, 36.39535, 
  75.   -22.49357, 92.38795, 30.95973, 
  76.   -48.87256, 55.55703, 67.2673, 
  77.   0.6, 0.1, 0.1,    ' Ambient
  78.   0.6, 0.1, 0.1,    ' Diffuse
  79.   10, 0.3,          ' Specular
  80.   0, 0, 0,          ' Reflected
  81.   1, 1, 1,          ' TransN, n1, n2
  82.   0, 0, 0           ' Transmitted
  83. )
  84. Polygon(4, ' Number of points
  85.   -44.94658, -83.14696, 32.6556, 
  86.   -74.74343, -38.26834, 54.30427, 
  87.   -87.86617, -38.26834, -28.54946, 
  88.   -52.83787, -83.14696, -17.16807, 
  89.   0.6, 0.1, 0.1,    ' Ambient
  90.   0.6, 0.1, 0.1,    ' Diffuse
  91.   10, 0.3,          ' Specular
  92.   0, 0, 0,          ' Reflected
  93.   1, 1, 1,          ' TransN, n1, n2
  94.   0, 0, 0           ' Transmitted
  95. )
  96. Polygon(4, ' Number of points
  97.   -79.3472, -19.50903, 57.64911, 
  98.   -74.74343, 38.26835, 54.30427, 
  99.   -87.86617, 38.26835, -28.54946, 
  100.   -93.27822, -19.50903, -30.30794, 
  101.   0.6, 0.1, 0.1,    ' Ambient
  102.   0.6, 0.1, 0.1,    ' Diffuse
  103.   10, 0.3,          ' Specular
  104.   0, 0, 0,          ' Reflected
  105.   1, 1, 1,          ' TransN, n1, n2
  106.   0, 0, 0           ' Transmitted
  107. )
  108. Polygon(4, ' Number of points
  109.   -67.2673, 55.55703, 48.87255, 
  110.   -30.95974, 92.38795, 22.49356, 
  111.   -36.39535, 92.38795, -11.82557, 
  112.   -79.07745, 55.55703, -25.69383, 
  113.   0.6, 0.1, 0.1,    ' Ambient
  114.   0.6, 0.1, 0.1,    ' Diffuse
  115.   10, 0.3,          ' Specular
  116.   0, 0, 0,          ' Reflected
  117.   1, 1, 1,          ' TransN, n1, n2
  118.   0, 0, 0           ' Transmitted
  119. )
  120. Polygon(4, ' Number of points
  121.   -44.94658, -83.14696, -32.65561, 
  122.   -74.74342, -38.26834, -54.30429, 
  123.   1.211522E-05, -38.26834, -92.38795, 
  124.   7.285425E-06, -83.14696, -55.55703, 
  125.   0.6, 0.1, 0.1,    ' Ambient
  126.   0.6, 0.1, 0.1,    ' Diffuse
  127.   10, 0.3,          ' Specular
  128.   0, 0, 0,          ' Reflected
  129.   1, 1, 1,          ' TransN, n1, n2
  130.   0, 0, 0           ' Transmitted
  131. )
  132. Polygon(4, ' Number of points
  133.   -79.34719, -19.50903, -57.64912, 
  134.   -74.74342, 38.26835, -54.30429, 
  135.   1.211522E-05, 38.26835, -92.38795, 
  136.   1.286145E-05, -19.50903, -98.07853, 
  137.   0.6, 0.1, 0.1,    ' Ambient
  138.   0.6, 0.1, 0.1,    ' Diffuse
  139.   10, 0.3,          ' Specular
  140.   0, 0, 0,          ' Reflected
  141.   1, 1, 1,          ' TransN, n1, n2
  142.   0, 0, 0           ' Transmitted
  143. )
  144. Polygon(4, ' Number of points
  145.   -67.2673, 55.55703, -48.87256, 
  146.   -30.95973, 92.38795, -22.49357, 
  147.   5.018287E-06, 92.38795, -38.26834, 
  148.   1.090341E-05, 55.55703, -83.14696, 
  149.   0.6, 0.1, 0.1,    ' Ambient
  150.   0.6, 0.1, 0.1,    ' Diffuse
  151.   10, 0.3,          ' Specular
  152.   0, 0, 0,          ' Reflected
  153.   1, 1, 1,          ' TransN, n1, n2
  154.   0, 0, 0           ' Transmitted
  155. )
  156. Polygon(4, ' Number of points
  157.   17.16807, -83.14696, -52.83787, 
  158.   28.54946, -38.26834, -87.86617, 
  159.   87.86617, -38.26834, -28.54943, 
  160.   52.83788, -83.14696, -17.16806, 
  161.   0.6, 0.1, 0.1,    ' Ambient
  162.   0.6, 0.1, 0.1,    ' Diffuse
  163.   10, 0.3,          ' Specular
  164.   0, 0, 0,          ' Reflected
  165.   1, 1, 1,          ' TransN, n1, n2
  166.   0, 0, 0           ' Transmitted
  167. )
  168. Polygon(4, ' Number of points
  169.   30.30795, -19.50903, -93.27822, 
  170.   28.54946, 38.26835, -87.86617, 
  171.   87.86617, 38.26835, -28.54943, 
  172.   93.27823, -19.50903, -30.30792, 
  173.   0.6, 0.1, 0.1,    ' Ambient
  174.   0.6, 0.1, 0.1,    ' Diffuse
  175.   10, 0.3,          ' Specular
  176.   0, 0, 0,          ' Reflected
  177.   1, 1, 1,          ' TransN, n1, n2
  178.   0, 0, 0           ' Transmitted
  179. )
  180. Polygon(4, ' Number of points
  181.   25.69383, 55.55703, -79.07745, 
  182.   11.82557, 92.38795, -36.39535, 
  183.   36.39536, 92.38795, -11.82556, 
  184.   79.07746, 55.55703, -25.69381, 
  185.   0.6, 0.1, 0.1,    ' Ambient
  186.   0.6, 0.1, 0.1,    ' Diffuse
  187.   10, 0.3,          ' Specular
  188.   0, 0, 0,          ' Reflected
  189.   1, 1, 1,          ' TransN, n1, n2
  190.   0, 0, 0           ' Transmitted
  191. )
  192.  
  193.  
  194.